Attribute VB_Name = "dim"
Public lastnam As String
Public lastlastnam As String
Public cv As Integer
